#pragma once

#include <iostream>
#include <string>
#include <memory>
#include <sys/epoll.h>
#include "Log.hpp"
#include "Socket.hpp"

using namespace SocketModule;
using namespace LogModule;

#define MAX 4096

const int gdefaultfd = -1;

class EpollServer
{
    static const int revs_num = 64;

public:
    EpollServer(uint16_t port)
        : _port(port), _epollfd(gdefaultfd), _listen_sockfd(std::make_unique<TcpSocket>()), _isrunning(false)
    {}

    ~EpollServer()
    {
        _listen_sockfd->Close();
        if (_epollfd >= 0)
            ::close(_epollfd);
    }

    void Init()
    {
        _listen_sockfd->BuildTcpSocketMethod(_port);

        // 1. 创建epoll模型
        _epollfd = epoll_create(256);
        if (_epollfd < 0)
        {
            LOG(LogLevel::DEBUG) << "epoll_create error";
            exit(EPOLL_CREATE_ERR);
        }
        LOG(LogLevel::DEBUG) << "epoll_create success, _epollfd: " << _epollfd;

        // 2. 将监听套接字添加到epoll模型中, 只关心读事件
        struct epoll_event ev;
        ev.events = EPOLLIN;
        ev.data.fd = _listen_sockfd->Fd();
        int n = epoll_ctl(_epollfd, EPOLL_CTL_ADD, _listen_sockfd->Fd(), &ev);
        if (n < 0)
        {
            LOG(LogLevel::DEBUG) << "epoll_ctl error";
            exit(EPOLL_CTL_ERR);
        }
        LOG(LogLevel::DEBUG) << "epoll_ctl success";
    }

    void Loop()
    {
        int timeout = -1; // 阻塞
        _isrunning = true;

        while (_isrunning)
        {
            // 不能让 accept 来阻塞新连接的到来，而应该让 epoll 来负责就绪事件的检测
            // 用户告诉内核, 你要帮我关心, 文件描述符的读事件
            int n = epoll_wait(_epollfd, _revs, revs_num, timeout); // 返回就绪事件的个数
            switch (n)
            {
            case 0:
                std::cout << "time out..." << std::endl;
                break;
            case -1:
                std::cout << "epoll error..." << std::endl;
                break;
            default:
                // 内核告诉用户, 有读事件就绪了
                std::cout << "有事件就绪了..." << std::endl;
                Dispatcher(n); // 把已经就绪的 sockfd 的个数, 派发给指定的模块
                break;
            }
        }
        _isrunning = false;
    }

    void Accepter()
    {
        // 直接获取新连接, 此时 accept 不会阻塞, 只执行 "拷贝"
        InetAddr client;
        int newsockfd = _listen_sockfd->AcceptOrDie(&client);
        if (newsockfd < 0)
            return;
        else
        {
            std::cout << "获取了一个新连接: " << newsockfd << " client info: " << client.Addr() << std::endl;

            // 由于并不知道 newsockfd 的读事件是否就绪, 不能直接 recv, 否则会阻塞
            // 而是需要让 epoll 帮助我们关心 newsockfd 的读事件是否就绪
            // 如何做呢? 直接将 newsockfd 添加到 _revs 数组中的合法位置即可
            struct epoll_event ev;
            ev.data.fd = newsockfd;
            ev.events = EPOLLIN;
            int n = epoll_ctl(_epollfd, EPOLL_CTL_ADD, newsockfd, &ev);
            if (n < 0)
            {
                LOG(LogLevel::ERROR) << "epoll_ctl error";
                close(newsockfd);
            }
            LOG(LogLevel::ERROR) << "epoll_ctl success";
        }
    }

    void Recver(int fd)
    {
        // 合法的, 读事件就绪的, 用于通信的套接字: 连接套接字
        char buffer[1024];
        ssize_t n = ::recv(fd, buffer, sizeof(buffer) - 1, 0); // 此时 recv 不会阻塞
        if (n > 0)
        {
            buffer[n] = '\0';
            std::cout << "client# " << buffer << std::endl;

            // 将读到的数据回显回去
            std::string message = "echo# ";
            message += buffer;
            ::send(fd, message.c_str(), message.size(), 0); // bug
        }
        else if (n == 0)
        {
            LOG(LogLevel::DEBUG) << "客户端退出, sockfd: " << fd;

            // 1. 将fd从epoll中删除, 必须保证fd是一个合法的文件描述符: 先移除, 再关闭
            int m = epoll_ctl(_epollfd, EPOLL_CTL_DEL, fd, nullptr);
            if(m < 0)
            {
                LOG(LogLevel::ERROR) << "epoll_ctl error";
                return;
            }

            // 2. 关闭文件描述符, 防止fd泄漏
            close(fd);
        }
        else
        {
            LOG(LogLevel::DEBUG) << "客户端读取出错, sockfd: " << fd;
            int m = epoll_ctl(_epollfd, EPOLL_CTL_DEL, fd, nullptr);
            if(m < 0)
            {
                LOG(LogLevel::ERROR) << "epoll_ctl error";
                return;
            }
            close(fd);
        }
    }

    void Dispatcher(int rnum)
    {
        // 遍历_revs数组
        for (int i = 0; i < rnum; i++)
        {
            int event = _revs[i].events;
            int fd = _revs[i].data.fd;

            // 如果文件描述符是监听套接字
            if (fd == _listen_sockfd->Fd())
            {
                // 监听套接字的读事件就绪了: 存在客户端连接
                if (event & EPOLLIN)
                {
                    Accepter();
                }
            }
            else // 如果文件描述符是连接套接字
            {
                // 连接套接字的读事件就绪了: 客户端发送了数据给服务器
                if (event & EPOLLIN)
                {
                    Recver(fd);
                }
            }
        }
    }

private:
    uint16_t _port;
    std::unique_ptr<Socket> _listen_sockfd;
    bool _isrunning;

    int _epollfd;
    struct epoll_event _revs[revs_num];
};